-- card: 3596 from stack: in
-- bmap block id: 0
-- flags: 4000
-- background id: 2786
-- name: loops


-- part 1 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=88 top=156 right=178 bottom=198
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Repeat X Times
----- HyperTalk script -----
on mouseUp
  global holder
  ask "How many times?" with "1"
  put it && "times" & return into timesRep
  repeat until it is empty
    ask "What do you wish to repeat?"
    if it is empty then exit repeat
    put it & return into whatRep
    put whatRep after timesRep
  end repeat
  put timesRep & "end repeat" after holder
  put holder & return after field "script-it" of card "main card"
  visual effect wipe left
  pop card
end mouseUp



-- part 2 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=88 top=199 right=221 bottom=196
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Repeat Forever
----- HyperTalk script -----
on mouseUp
  global holder
  put "forever " & return into timesRep
  repeat forever
    ask "What do you wish to repeat?"
    if it is empty then exit repeat
    put it & return into whatRep
    put whatRep after timesRep
  end repeat
  put timesRep & "end repeat" after holder
  put holder & return after field "script-it" of card "main card"
  visual effect wipe left
  pop card
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=292 top=157 right=179 bottom=402
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Repeat Until
----- HyperTalk script -----
on mouseUp
  global holder
  ask "Repeat until what?"
  put "until " & it & return into timesRep
  repeat until it is empty
    ask "What do you wish to repeat?"
    if it is empty then exit repeat
    put it & return into whatRep
    put whatRep after timesRep
  end repeat
  put timesRep & "end repeat" after holder
  put holder & return after field "script-it" of card "main card"
  visual effect wipe left
  pop card
end mouseUp



-- part 4 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=293 top=199 right=221 bottom=402
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Repeat While
----- HyperTalk script -----
on mouseUp
  global holder
  ask "Repeat while what?"
  put "while " & it & return into timesRep
  repeat until it is empty
    ask "What do you wish to repeat?"
    if it is empty then exit repeat
    put it & return into whatRep
    put whatRep after timesRep
  end repeat
  put timesRep & "end repeat" after holder
  put holder & return after field "script-it" of card "main card"
  visual effect wipe left
  pop card
end mouseUp



-- part 5 (button)
-- low flags: 00
-- high flags: 8003
-- rect: left=201 top=251 right=273 bottom=301
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Repeat With
----- HyperTalk script -----
on mouseUp
  global holder
  ask "Repeat with what?"
  put "with " & it & return into timesRep
  repeat until it is empty
    ask "What do you wish to repeat?"
    if it is empty then exit repeat
    put it & return into whatRep
    put whatRep after timesRep
  end repeat
  put timesRep & "end repeat" after holder
  put holder & return after field "script-it" of card "main card"
  visual effect wipe left
  pop card
end mouseUp